home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 106 / EnigmaAmiga106CD.iso / dalla rivista... / samba / smb-connect / install next >
Text File  |  1999-07-30  |  3KB  |  136 lines
  1. ; This Installer script v1.00 for SMB-Connect
  2.  
  3. ; Setzen der Sprachen
  4. (set #t1 "")
  5.  
  6. (if (= @language "deutsch") (
  7.     (set    #t1     "Kopiere SMB-Handler...")
  8.     (set    #t2     "Kopiere SMB-Net...")
  9.     (set    #t3     "Welche Sprachen sollen installiert werden?")
  10.     (set    #t4     "deutsch")
  11.     (set    #t5     "polnisch (nur SMB-Handler)")
  12.     (set    #t6     "Kopiere deutsche Katalogdateien...")
  13.     (set    #t7     "Kopiere polnische Katalogdatei...")
  14.     (set    #t8     "\n\n\n\n\nInstallation erfolgreich beendet.")
  15.     (set    #t9     "Welche Hilfedateien sollen installiert werden?")
  16.     (set    #t10    "Kopiere deutsche Hilfedatei...")
  17.     (set    #t11    "Soll das Guide angezeigt werden?")
  18.     (set    #t12    "Kopiere englische Hilfedatei...")
  19.     (set    #t13    "english")
  20.     (set    #t14    "Soll das englische Guide angezeigt werden?")
  21. ))
  22.  
  23. (if (= #t1 "") (
  24.     (set    #t1     "copy SMB-Handler...")
  25.     (set    #t2     "copy SMB-Net...")
  26.     (set    #t3     "Which languages should be copy?")
  27.     (set    #t4     "german")
  28.     (set    #t5     "polski (SMB-Handler only)")
  29.     (set    #t6     "copy german catalogs...")
  30.     (set    #t7     "copy polski catalog...")
  31.     (set    #t8     "\n\n\n\n\nInstallation successfull finished.")
  32.     (set    #t9     "Which guides should be copy?")
  33.     (set    #t10    "copy german guide...")
  34.     (set    #t11    "Show the german guide?")
  35.     (set    #t12    "copy english guide...")
  36.     (set    #t13    "english")
  37.     (set    #t14    "Show the english guide?")
  38. ))
  39.  
  40. ; SMB-Handler kopieren
  41. (copylib
  42.     (prompt #t1)
  43.     (help @copylib-help)
  44.     (source "bin/SMB-Handler")
  45.     (dest "L:")
  46.     (optional "askuser" "force")
  47.     (confirm)
  48. )
  49.  
  50. ; SMB-Net kopieren
  51. (copyfiles
  52.     (prompt #t2)
  53.     (help @copylib-help)
  54.     (source "bin")
  55.     (pattern "SMB-N#?")
  56.     (dest "sys:WBStartup")
  57.     (noposition)
  58.     (confirm)
  59. )
  60.  
  61. ; Kataloge kopieren
  62. (set #name
  63.     (askoptions
  64.         (prompt #t3)
  65.         (help @askoptions-help)
  66.         (choices #t4 #t5)
  67.         (default 3)
  68.     )
  69. )
  70.  
  71. (if (= (bitand #name 0) 1)
  72.     (copyfiles
  73.         (prompt #t6)
  74.         (help @copyfiles-help)
  75.         (source "catalogs/deutsch")
  76.         (dest "Locale:catalogs/deutsch")
  77.         (pattern "#?.catalog")
  78.         (files)
  79.     )
  80. )
  81.  
  82. (if (= (bitand #name 1) 2)
  83.     (copyfiles
  84.         (prompt #t7)
  85.         (help @copyfiles-help)
  86.         (source "catalogs/polski")
  87.         (dest "Locale:catalogs/polski")
  88.         (pattern "#?.catalog")
  89.         (files)
  90.     )
  91. )
  92.  
  93. ; Hilfedateien kopieren
  94. (set #name
  95.     (askoptions
  96.         (prompt #t9)
  97.         (help @askoptions-help)
  98.         (choices #t4 #t13)
  99.         (default 3)
  100.     )
  101. )
  102.  
  103. (if (= (bitand #name 1) 1) (
  104.     (copyfiles
  105.         (prompt #t10)
  106.         (help @copyfiles-help)
  107.         (source "SMB-Connect_deutsch.guide")
  108.         (newname "SMB-Connect.guide")
  109.         (dest "Help:Deutsch")
  110.         (optional "askuser" "force")
  111.         (files)
  112.     )
  113.     (if (= (askbool (prompt #t11) (help @askbool-help)) 1) (
  114.       (run "multiview help:deutsch/SMB-Connect.guide")
  115.     ))
  116. ))
  117.  
  118. (if (= (bitand #name 2) 2) (
  119.     (copyfiles
  120.         (prompt #t12)
  121.         (help @copyfiles-help)
  122.         (source "SMB-Connect_english.guide")
  123.         (newname "SMB-Connect.guide")
  124.         (dest "Help:English")
  125.         (optional "askuser" "force")
  126.         (files)
  127.     )
  128.     (if (= (askbool (prompt #t14) (help @askbool-help)) 1) (
  129.       (run "multiview help:english/SMB-Connect.guide")
  130.     ))
  131. ))
  132.  
  133. (exit #t8
  134.     (quiet)
  135. )
  136.